function [F, T] = Wald_IVGMM(beta, COVAR)
global n k
%This file conducts the F and P Wald tests for the IVLogit GMM model's
%first stage estimation


%F-test statistic
F = (beta'*inv(COVAR)*beta)/k;



%Wald test statistics
T = beta./((diag(COVAR)).^0.5); %t-stat to be reported

